home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1994 October / Macformat17.cdr / Shareware City / Developers / GAL ƒ / GAL examples / counter < prev    next >
Encoding:
Text File  |  1994-07-11  |  175 b   |  12 lines  |  [TEXT/SSIW]
  1. ; counts from 1 to 10
  2. ; shows simple for-loop control    
  3.     copy    #0,Reg1
  4.     copy    #1,Reg2
  5.     copy    #10,Reg3
  6. Looptop
  7.     add        Reg2,Reg1
  8.     compare    Reg1,Reg3
  9.     jump:lessthan    Looptop
  10.     halt
  11.     end
  12.